Αποστολή ειδικών χαρακτήρων σε εκτυπωτή

	Καλώς ορίσατε στο dotNETZone.gr - Σύνδεση \| Εγγραφή \| Βοήθεια σε

Îåêßíçóå áðü ôï ìÝëïò neoklis. Τελευταία δημοσίευση από το μέλος neoklis στις 09-03-2009, 12:04. Υπάρχουν 5 απαντήσεις.


	Ταξινόμηση Δημοσιεύσεων: Προηγούμενο Επόμενο

06-03-2009, 11:58 48952

neoklis
Μέλος από τις 18-06-2007
Δημοσιεύσεις 192

Αποστολή ειδικών χαρακτήρων σε εκτυπωτή

Καλημέρα,

Σε έναν εκτυπωτή ο οποίος θα εκτυπώνει αυτοκόλλητα καρτελάκια θέλω να στείλω τους παρακάτω χαρακτήρες και μετά να αρχίσει να εκτυπώνει. Θα μπορούσε κάποιος να με βοηθήσει μ’ ένα απλό παράδειγμα;

Dim Line(3) As String

Line(0) = "^XA"

Line(1) = "^XFZYG_A5L.ZPL^FS"

Line(2) = "^FN0^FDTEST 19.11.08 14:13 ^FS"

Line(3) = "^XZ"

Ευχαριστώ

Dionisis

Αναφορά Κακοποίησης

09-03-2009, 10:05 49028 σε απάντηση της 48952

neoklis
Μέλος από τις 18-06-2007
Δημοσιεύσεις 192

Απ: Αποστολή ειδικών χαρακτήρων σε εκτυπωτή

Το πρόβλημα το έλυσα με την βοήθεια του παρακάτω συνδέσμου..

http://support.microsoft.com/kb/322090

Dionisis

Αναφορά Κακοποίησης

09-03-2009, 10:23 49030 σε απάντηση της 48952

nikos123
Μέλος από τις 26-04-2006
Δημοσιεύσεις 104

Απ: Αποστολή ειδικών χαρακτήρων σε εκτυπωτή

Για να στείλεις σκέτα bytes στον εκτυπωτη πρέπει να κάνεις P/Invoke την WritePrinter.

[DllImport("winspool.Drv", EntryPoint = "WritePrinter", SetLastError = true, ExactSpelling = true, CallingConvention = CallingConvention.StdCall)]
private static extern bool WritePrinter(IntPtr hPrinter, IntPtr pBytes, Int32 dwCount, out Int32 dwWritten);

.
.
.

byte[] b = Encoding.ASCII.GetBytes("^XA");
IntPtr pBytes = Marshal.AllocHGlobal(b.Length);
Marshal.Copy(b, 0, pBytes, b.Length);
WritePrinter(hPrinter, pBytes, dwCount, out dwWritten);